object Srv_StatusSetForm: TSrv_StatusSetForm
  Left = 212
  Top = 197
  BorderStyle = bsDialog
  Caption = #26381#21153#22120#29366#24577#35774#32622
  ClientHeight = 169
  ClientWidth = 270
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  Scaled = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 14
  object GroupBox1: TGroupBox
    Left = 16
    Top = 16
    Width = 236
    Height = 105
    Caption = #31105#29992'/'#21551#29992#26381#21153#22120#65306
    TabOrder = 0
    object RadioButton1: TRadioButton
      Left = 38
      Top = 32
      Width = 113
      Height = 17
      Caption = #21551#29992#32771#35797#26381#21153
      TabOrder = 0
    end
    object RadioButton2: TRadioButton
      Left = 38
      Top = 64
      Width = 113
      Height = 17
      Caption = #31105#29992#32771#35797#26381#21153
      TabOrder = 1
    end
  end
  object BitBtn1: TBitBtn
    Left = 73
    Top = 134
    Width = 75
    Height = 25
    Caption = #30830#23450'[&O]'
    TabOrder = 1
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 161
    Top = 134
    Width = 75
    Height = 25
    Caption = #36864#20986'[&X]'
    TabOrder = 2
    OnClick = BitBtn2Click
  end
  object ClientDataSet1: TClientDataSet
    Aggregates = <>
    CommandText = 
      'select xs.'#23398#21495',xs.'#22995#21517' from '#32771#29983#20449#24687#34920' xs where xs.'#23398#21495' not in (select '#23398#21495' f' +
      'rom '#32771#29983#32771#35797#34920') order by '#23398#21495
    Params = <>
    ProviderName = 'tmp_DataSetProvider'
    RemoteServer = RDataForm.MyConnection
    AfterPost = ClientDataSet1AfterPost
    Left = 152
    Top = 8
  end
end
